home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 98 / Skunkware 98.iso / src / net / bind-contrib.tar.gz / bind-contrib.tar / contrib / ckdns / ckdns.shar / ckdomaincf.sh next >
Encoding:
Linux/UNIX/POSIX Shell Script  |  1996-10-25  |  2.8 KB  |  129 lines
  1. #!/bin/sh
  2. # @(#)ckdomaincf.sh    1.3    1/4/91
  3. #
  4. # ckdomaincf - check domain configuration
  5. #
  6. # SYNOPSIS
  7. #    ckdomaincf [ -n ]
  8. #
  9. # ckdomaincf checks the domain configuration.  It determines which
  10. # domains to check by examining /etc/named.boot and checking all domains
  11. # listed on the primary and secondar lines.  However, ckdomaincf ignores
  12. # checking the 0.0.127.in-addr.arpa domain and any domain with unixhosts
  13. # as the data file.  It is assumed that these domain data files will
  14. # contain domain definitions for the unix localhost and will be specific
  15. # to the local definition.
  16. # 
  17. # If the -n flag is specified, no mail will be sent after checking.
  18. # 
  19. BOOTFILE=/etc/named.boot
  20. MAIL=/usr/ucb/Mail
  21. NOTIFY=hostmaster
  22. NOTIFYLEVEL=10    # 10 - any warning or greater
  23.         # 50 - any error or greater
  24.         # 100 - any abort
  25. PATH=$PATH:/usr/local/etc export PATH
  26. TMP=/tmp/.ckd$$
  27.  
  28. set -- `getopt n $*`
  29. if [ $? != 0 ]; then
  30.     echo usage: ckdomaincf [ -n ]
  31.     exit 2
  32. fi
  33. for i in $*; do
  34.     case $i in
  35.     -n ) MAIL="echo /usr/ucb/Mail"; shift;;
  36.     --)     shift; break;;
  37.     esac
  38. done
  39.  
  40. tolower() {
  41.     echo $1 | tr A-Z a-z
  42. }
  43.  
  44. is_in_addr() {
  45.     if [ `expr $1 : '.*in-addr'` -gt 0 ]; then
  46.         true;
  47.     else
  48.         false;
  49.     fi
  50. }
  51.  
  52. # strip comments from zone data
  53. stripcomments() {
  54.         sed -e '/^;/d' -e 's/;.*//' $*
  55. }
  56.  
  57. # get mail address of person in charge of the zone
  58. getpersonincharge() {
  59.     dig soa $1. +pfset=0xa224 | \
  60.         stripcomments | tr a-z A-Z | awk '$3 == "SOA" {print $5}'
  61. }
  62.  
  63. # convert domain name to mail address
  64. domaintoaddr() {
  65.         echo $1 | sed -e 's/\.$//' -e 's/\./@/'
  66. }
  67.  
  68. # notify the person in charge of a zone of detected errors
  69. notifypersonincharge() {
  70.     failtype=problems
  71.     if [ $2 -gt 50 ]; then
  72.         failtype=errors
  73.     fi
  74.     if [ $2 -gt 100 ]; then
  75.         failtype=failures
  76.     fi
  77.         MB=`getpersonincharge $1`
  78.     ( cat $1.log;
  79.       echo ""; echo ""; echo ""; echo "Complete log of test follows:"; echo " ";
  80.       cat log.$1.
  81.     ) | \
  82.         $MAIL -s "$1 zone configuration $failtype" $NOTIFY `domaintoaddr $MB` 
  83.         echo $1 zone configuration $failtype
  84.     sed 's/^/  /' $1.log
  85.         echo "  $NOTIFY, `domaintoaddr $MB` notified via mail."
  86.     echo ""
  87. }
  88.  
  89. cd /tmp
  90.  
  91. trap "rm -f $TMP*; exit 1" 2 3
  92.  
  93. egrep '^(primary|secondary)' $BOOTFILE >$TMP.domains
  94.  
  95. while read line; do
  96.     set -- $line
  97.  
  98.     domainname=`tolower $2`
  99.     if is_in_addr $domainname; then
  100.         parent=arpa.
  101.     else
  102.         parent=
  103.     fi
  104.  
  105.     # find data file
  106.     while [ "$2" != "" ]; do
  107.         shift
  108.     done
  109.     datafile=$1
  110.  
  111.     # ignore localhost domain stuff
  112.     if [ $domainname = 0.0.127.in-addr.arpa -o $datafile = unixhosts ]; then
  113.         continue
  114.     fi
  115.  
  116.     rm -f log.$domainname.
  117.     doc -w -e $domainname. $parent 2>/dev/null >$TMP.docout
  118.     status=$?
  119.     egrep -v '^(Doc-|DIGERR|Done testing)' <$TMP.docout >$domainname.log
  120.     
  121.     if [ $status -gt $NOTIFYLEVEL ]; then
  122.         notifypersonincharge $domainname $status
  123.     fi
  124.     
  125.     rm -f log.$domainname. $domainname.log
  126. done <$TMP.domains
  127.  
  128. rm -f $TMP*
  129.